namespace ::

entry {
    ShowWindow({
        @use dec = PlainButton('-'),
        @use inc = PlainButton('+'),
        @use lbl = Label {
            align: Center,
            text: Merge((dec.Clicks map-to -1), (inc.Clicks map-to 1))
                | reduce (0, { (n,delta) => (n + delta) })
                | map ({ n => String('  [',n,']  ') })
        },
        Window($('Counter'), Row(dec.Widget, lbl.Widget, inc.Widget))
    })
}


